home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / v10n16.arc / GETLEN.BAT < prev    next >
DOS Batch File  |  1991-08-27  |  563b  |  33 lines
  1. @ECHO OFF
  2. IF '%1'=='' GOTO Help
  3. IF NOT '%Z%'=='' GOTO Used
  4. IF NOT '%N%'=='' GOTO Used
  5. MD XOOXOOX.$$$
  6. CD XOOXOOX.$$$
  7. REM > %1
  8. :loop
  9. SET Z=%Z%■
  10. REN ???????? %Z%????????
  11. IF EXIST %Z% GOTO okay
  12. GOTO loop
  13. :okay
  14. IF %Z%==■ SET N=1
  15. IF %Z%==■■ SET N=2
  16. IF %Z%==■■■ SET N=3
  17. IF %Z%==■■■■ SET N=4
  18. IF %Z%==■■■■■ SET N=5
  19. IF %Z%==■■■■■■ SET N=6
  20. IF %Z%==■■■■■■■ SET N=7
  21. IF %Z%==■■■■■■■■ SET N=8
  22. DEL %Z%
  23. CD..
  24. RD XOOXOOX.$$$
  25. SET Z=
  26. GOTO exit
  27. :Used
  28. ECHO Environment string 'Z' or 'N' already in use...
  29. GOTO Exit
  30. :Help
  31. ECHO Usage: GetLen string
  32. :exit
  33.